home *** CD-ROM | disk | FTP | other *** search
/ Chip 2007 January, February, March & April / Chip-Cover-CD-2007-02.iso / Pakiet bezpieczenstwa / mini Pentoo LiveCD 2006.1 / mpentoo-2006.1.iso / modules / nessus-2.2.8.mo / usr / lib / nessus / plugins / smtp_bounce.nasl < prev    next >
Encoding:
Text File  |  2005-01-14  |  2.8 KB  |  109 lines
  1. #
  2. # This script was written by Renaud Deraison <deraison@cvs.nessus.org>
  3. #
  4. # See the Nessus Scripts License for details
  5. #
  6.  
  7. if(description)
  8. {
  9.  script_id(10258);
  10.  script_bugtraq_id(2308);
  11.  script_version ("$Revision: 1.28 $");
  12.  script_cve_id("CVE-1999-0203");
  13.  
  14.  name["english"] = "Sendmail's from piped program";
  15.  script_name(english:name["english"]);
  16.  
  17.  desc["english"] = "
  18.  
  19. The remote SMTP server did not complain when issued the
  20. command :
  21.     MAIL FROM: |testing
  22.     
  23. This probably means that it is possible to send mail 
  24. that will be bounced to a program, which is 
  25. a serious threat, since this allows anyone to execute 
  26. arbitrary commands on this host.
  27.  
  28. *** This security hole might be a false positive, since
  29. *** some MTAs will not complain to this test, but instead
  30. *** just drop the message silently
  31.    
  32. Solution : upgrade your MTA or change it.
  33.  
  34. Risk factor : High";
  35.  
  36.  
  37.  desc["francais"] = "
  38.  
  39. Le serveur SMTP distant n'a pas refusΘ la
  40. suite de commandes suivante :
  41.     MAIL FROM: |testing
  42.     
  43. Cela signifie probablement qu'il est possible
  44. d'envoyer du courrier qui sera bouncΘ 
  45. α un programme, ce qui est un problΦme de 
  46. sΘcuritΘ puisque cela permet α n'importe qui 
  47. d'executer des commandes arbitraires sur 
  48. cette machine.
  49.  
  50.  
  51. *** Ce problΦme de sΘcuritΘ peut etre
  52. *** une fausse alerte, puisque certains MTA 
  53. *** ne refusent pas ces commandes mais ignorent
  54. *** le message envoyΘ
  55.  
  56. Solution : mettez α jour votre MTA ou changez-le.
  57.  
  58. Facteur de risque : ElevΘ";
  59.  
  60.  script_description(english:desc["english"],
  61.               francais:desc["francais"]);
  62.             
  63.  
  64.  summary["english"] = "Checks if the remote mail server can be used to gain a shell"; 
  65.  summary["francais"] = "VΘrifie si le serveur de mail distant peut etre utilisΘ obtenir un shell";
  66.  script_summary(english:summary["english"],
  67.           francais:summary["francais"]);
  68.  
  69.  script_category(ACT_GATHER_INFO);
  70.  
  71.  script_copyright(english:"This script is Copyright (C) 1999 Renaud Deraison",
  72.            francais:"Ce script est Copyright (C) 1999 Renaud Deraison");
  73.  
  74.  family["english"] = "SMTP problems";
  75.  family["francais"] = "ProblΦmes SMTP";
  76.  script_family(english:family["english"], francais:family["francais"]);
  77.  script_dependencie("find_service.nes", "sendmail_expn.nasl", "smtpserver_detect.nasl");
  78.  script_require_keys("SMTP/sendmail");
  79.  script_require_ports("Services/smtp", 25);
  80.  exit(0);
  81. }
  82.  
  83. #
  84. # The script code starts here
  85. #
  86.  
  87. include("smtp_func.inc");
  88. port = get_kb_item("Services/smtp");
  89. if(!port)port = 25;
  90. if(get_port_state(port))
  91. {
  92.  soc = open_sock_tcp(port);
  93.  if(soc)
  94.  {
  95.  data = smtp_recv_banner(socket:soc);
  96.  if(!data)exit(0);
  97.  if("Sendmail" >!< data)exit(0);
  98.  
  99.  crp = string("HELO example.com\r\n");
  100.  send(socket:soc, data:crp);
  101.  data = recv_line(socket:soc, length:1024);
  102.  crp = string("MAIL FROM: |testing\r\n");
  103.  send(socket:soc, data:crp);
  104.  data = recv_line(socket:soc, length:4);
  105.  if(data=="250 ")security_hole(port);
  106.  close(soc);
  107.  }
  108. }
  109.